home *** CD-ROM | disk | FTP | other *** search
/ Univers Mac Interactif 53 / Univers Mac Interactif - Issue 53.iso / UNIVERS MAC 53 / Hypercard / Sans-Faute⁄Grammaire® / Sans-Faute⁄Grammaire ƒ / Pour les autres applications / FileMaker Pro / Exemple Script < prev    next >
Text File  |  1995-09-08  |  482b  |  14 lines

  1. tell application "FileMaker Pro"
  2.     set RecIndex to 1
  3.     repeat while Exists (Record RecIndex)
  4.         -- vérification du champ "Commentaire"
  5.         copy cellValue of Cell "Commentaire" of (Record RecIndex) as styled text to theText
  6.         tell Application "Sans-Faute/Grammaire 2.05"
  7.             copy (Checking theText) to TheText2
  8.         end tell
  9.         copy TheText2 as styled text to cellValue of Cell "Commentaire" of (Record RecIndex)
  10.         -- fin de la vérification
  11.         set RecIndex to RecIndex + 1
  12.     end repeat
  13. end tell
  14.